home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Macintosh PAP Client Interface / PAP.p < prev    next >
Encoding:
Text File  |  1996-08-07  |  1.6 KB  |  63 lines  |  [TEXT/MPS ]
  1. {                                                    }
  2. {    PAP.p                                            }
  3. {    Pascal Interface to PAP.WrkStation.o            }
  4. {                                                    }
  5. {    Copyright Apple Computer, Inc. 1992-1995        }
  6. {    All rights reserved                                }
  7. {                                                    }
  8.  
  9. UNIT PAP;
  10.  
  11. INTERFACE
  12.  
  13.     USES
  14.         Types, AppleTalk;
  15.  
  16.     CONST
  17.         PAPMaxDataSize    = 512;        { Maximum data size per flow quantum }
  18.  
  19.         PAPNoCCBs        = -4096;    { No free CCBs available }
  20.         PAPNoPrinter    = -4101;    { Printer or print server not found }
  21.         PAPConnClosed    = -4100;    { Connection just closed }
  22.         PAPBadRefnum    = -4097;    { Bad connection refnum }
  23.         PAPActive        = -4098;    { Request already active }
  24.         PAPTooBig        = -4099;    { Write request too big }
  25.  
  26.     TYPE
  27.         PAPStatusRecPtr = ^PAPStatusRec;
  28.         PAPStatusRec = RECORD
  29.                 papSocket: SignedByte;    { PAPOpen output: ATP responding socket }
  30.                 papFlow: SignedByte;    { PAPOpen output: Printer's Flow quantum }
  31.                 papResult: Integer;        { PAPOpen output: Result of last PAPOpen request }
  32.                 statusStr: STR255;        { PAPOpen and PAPStatus output: Status string }
  33.             END;
  34.  
  35.     FUNCTION PAPOpen (VAR refNum: INTEGER;
  36.                       printerName: EntityPtr;
  37.                       flowQuantum: INTEGER;
  38.                       statusBuff: PAPStatusRecPtr;
  39.                       VAR compState: OSErr): OSErr;
  40.  
  41.     FUNCTION WPAPClose (refNum: INTEGER): OSErr;
  42.  
  43.     FUNCTION WPAPRead (refNum: INTEGER;
  44.                        readBuff: Ptr;
  45.                        VAR dataSize: INTEGER;
  46.                        VAR eof: INTEGER;
  47.                        VAR compState: OSErr): OSErr;
  48.  
  49.     FUNCTION WPAPWrite (refNum: INTEGER;
  50.                         dataBuff: Ptr;
  51.                         dataSize: INTEGER;
  52.                         eof: INTEGER;
  53.                         VAR compState: OSErr): OSErr;
  54.  
  55.     FUNCTION PAPStatus (printerName: EntityPtr;
  56.                         statusBuff: PAPStatusRecPtr;
  57.                         VAR printerAddr: AddrBlock): OSErr;
  58.  
  59.     FUNCTION WPAPUnload: OSErr;
  60.  
  61. IMPLEMENTATION
  62.  
  63. END.